Давайте добавим в форму нашу процедуру. Щелкните два раза по форме что бы открылся исходный код формы. Дальше мы выбираем Tools - Add Procedure.

Появиться диалоговое окно в которое нужно будет внести имя процедуры.

После нажатия на ОК у нас появиться процедура.

В ней мы и напишем код по динамической установке свойств.

Public Sub InitDB()
ТаблицаОтчеты.Database = "c:\Base\dbtest.mdb"
ТаблицаОтчеты.RecordSource = "fond_name"
ТаблицаОтчеты.Refresh
End Sub 

Дальше остается только вызвать эту процедуру при загрузки формы.

Private Sub Form_Load()
InitDB
End Sub